inherited FCadBloco: TFCadBloco
  Left = 469
  Top = 262
  Caption = 'Cadastro de Modelo de Bloco por empreendimento'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited pnl1: TPanel
    Height = 105
    inherited pnl7: TPanel
      Height = 0
    end
  end
  inherited pnl2: TPanel
    Top = 105
    Height = 382
    object lbl1: TLabel [5]
      Left = 112
      Top = 104
      Width = 106
      Height = 13
      Caption = 'EMPBLODESCRICAO'
      FocusControl = dbedtEMPBLODESCRICAO
    end
    object lbl2: TLabel [6]
      Left = 8
      Top = 64
      Width = 72
      Height = 13
      Caption = 'EMPREENDID'
      FocusControl = dbedtEMPREENDID
    end
    object lbl3: TLabel [7]
      Left = 8
      Top = 104
      Width = 55
      Height = 13
      Caption = 'EMPBLOID'
      FocusControl = dbedtEMPBLOID
    end
    inherited BtNovo: TBitBtn
      TabOrder = 2
    end
    inherited BtGravar: TBitBtn
      TabOrder = 4
    end
    inherited BtCancelar: TBitBtn
      TabOrder = 5
    end
    inherited BtExcluir: TBitBtn
      TabOrder = 6
    end
    inherited pnl15: TPanel
      TabOrder = 7
    end
    object dbedtEMPBLODESCRICAO: TDBEdit
      Left = 112
      Top = 120
      Width = 489
      Height = 21
      DataField = 'EMPBLODESCRICAO'
      DataSource = dsPadrao
      TabOrder = 3
    end
    object dbedtEMPREENDID: TDBEdit
      Left = 8
      Top = 80
      Width = 97
      Height = 21
      Color = clMoneyGreen
      DataField = 'EMPREENDID'
      DataSource = dsPadrao
      TabOrder = 0
      OnDblClick = dbedtEMPREENDIDDblClick
      OnExit = dbedtEMPREENDIDExit
    end
    object dbedtEMPBLOID: TDBEdit
      Left = 8
      Top = 120
      Width = 97
      Height = 21
      DataField = 'EMPBLOID'
      DataSource = dsPadrao
      ReadOnly = True
      TabOrder = 8
    end
    object EdDescEmpreendimento: TEdit
      Left = 104
      Top = 80
      Width = 497
      Height = 21
      ReadOnly = True
      TabOrder = 9
    end
    object Panel1: TPanel
      Left = 8
      Top = 148
      Width = 921
      Height = 17
      Anchors = [akLeft, akTop, akRight]
      Caption = 'Etapas'
      Color = clActiveCaption
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 10
    end
    object dbgrdBlocoEtapa: TDBGrid
      Left = 8
      Top = 168
      Width = 921
      Height = 209
      Anchors = [akLeft, akTop, akBottom]
      DataSource = dsblocoetapa
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 11
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDblClick = dbgrdBlocoEtapaDblClick
      OnKeyDown = dbgrdBlocoEtapaKeyDown
      Columns = <
        item
          Expanded = False
          FieldName = 'EMPREENDID'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'EMPBLOID'
          Visible = False
        end
        item
          Expanded = False
          FieldName = 'EMPBLOETPID'
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'EMPBLOETPDESCRICAO'
          Width = 400
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'EMPBLOETPVLMAODEOBRA'
          Width = 100
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'EMPBLOETPDTPREVFIM'
          Width = 75
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'EMPBLOETPDTPREVINICIO'
          Width = 75
          Visible = True
        end>
    end
    object dbchkEMPBLOFLAGINFRA: TDBCheckBox
      Left = 504
      Top = 56
      Width = 97
      Height = 17
      Caption = 'Infra-Estrutura ?'
      DataField = 'EMPBLOFLAGINFRA'
      DataSource = dsPadrao
      TabOrder = 1
      ValueChecked = 'True'
      ValueUnchecked = 'False'
    end
    object grp1: TGroupBox
      Left = 611
      Top = 53
      Width = 313
      Height = 90
      Caption = 'Replica'#231#227'o'
      TabOrder = 12
      object lblqtdreplica: TLabel
        Left = 281
        Top = 23
        Width = 12
        Height = 24
        Caption = '0'
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -19
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object BtReplica: TSpeedButton
        Left = 236
        Top = 18
        Width = 32
        Height = 32
        Enabled = False
        Glyph.Data = {
          F6060000424DF606000000000000360000002800000018000000180000000100
          180000000000C0060000120B0000120B00000000000000000000FF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFA46769A467
          69A46769A46769A46769A46769A46769A46769A46769A46769A46769A46769A4
          6769FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FFA46769FEE9C7F4DAB5F3D5AAF2D0A0EFCB96EFC68BEDC182EBC17FEBC1
          80EBC180F2C782A46769FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FFA36668FBE9CCF2D9BBF0D4B0EFCFA6EDCA9DEDC793
          EDC28BE9BD81E9BD7FE9BD7FEFC481A46769FF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF996257F6E7D4EED9C0E6D0B4E7
          CCABEACCA5EDCA9DEDC796EBC28CE9BD82E9BD7FEFC481A46769FF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF805249D8CF
          C1D1C1AFC4B49EC7B499DCC1A0EBCCA3EDCA9DEDC795EBC28AEABF81EFC480A4
          6769FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FF5B403A999790968C84877D70958879C2AD97E3C9A7EECEA7EBCA9DEDC6
          95EBC28AEFC583A46769FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFFF00FF005CFF005CFF3A28255A5A59005CFF005CFF70685EAA9C89D3BFA1
          E3C9A7EBCCA4EDCA9CEBC793F2C98CA46769FF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFFF00FF005CFF005CFF005CFF005CFF005CFF005CFF59
          544E877D70AB9C89C2AF96DCC0A0EBCCA4EDCB9DF3CE97A46769A46769A46769
          A46769A46769A366689D6365875456643F404A2E2F005CFF005CFF005CFF005C
          FF005CFF005CFF49464358544E6F675E958877C7B299E9CBA9EFCFA5F6D3A0A4
          6769A46769FEE9C7F4DAB5F3D5AAF0CF9FE3C18F005CFF005CFF005CFF005CFF
          005CFF005CFF005CFF005CFF005CFF005CFF005CFF005CFF877D70C5B29DE7CF
          B0F3D7B0EBCFA4A46769A46769FCEACEF3DABCF2D5B1EFCFA6E6C599005CFF00
          5CFF005CFF005CFF015BF678543FC4C4C4025FFC005CFF005CFF005CFF005CFF
          968B82D3C4B1F3E2C7DDCCB2B6AA93A46769A0675BFEEFDAF6E0C6F2DABCF0D4
          B1E7CAA4CAAC86005CFF005CFF005CFF51422D7E5A43C4C4C4C4C4C4005CFF00
          5CFF005CFF59575498928AC9B7AAA0685CA46A5FA56B5FA46769A0675BFFF4E5
          F7E5CFF4E0C5F2D9BAE6CBA9C1A786005CFF005CFF005CFF4639275E43339292
          92929292005CFF005CFF005CFF5858578B8A87AF9A959E665BE09D55E68F31B5
          6D4DA7756BFFFBF0F8EADCF6E3CFF3DEC5E7D0B5005CFF005CFF005CFF005CFF
          005CFC453324595959005CFC005CFF005CFF005CFF005CFF9A9A9AB5A4A19E67
          5BF7B45CBF7A5CFF00FFA7756BFFFFFCFAF0E6F8EADAF6E3CEEFDAC1005CFF00
          5CFF005CFF005CFF005CFF005CFF005CFF005CFF005CFF005CFF005CFF005CFF
          C6C2C0C4B0ADA1695DC0826BFF00FFFF00FFBC8268FFFFFFFEF7F2FAEFE6F8EA
          D9F6E2CEF0DAC1E3CEB0D3B89A005CFF005CFF005CFF005CFF005CFF005CFFD1
          926DD1926DD1926DD1926DD1926DA56B5FFF00FFFF00FFFF00FFBC8268FFFFFF
          FFFEFCFCF6F0FAEFE6F7EADAF4E2CEF2DDC2E5CCB0005CFF005CFF005CFF005C
          FF005CFF005CFFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFD1926DFFFFFFFFFFFFFFFEFCFEF7F0FAEFE5F8EAD9F6E3CCF0D9C0005CFF
          005CFFBCA6838A5759005CFF005CFFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFD1926DFFFFFFFFFFFFFFFFFFFFFEFCFCF7F0FAEFE5F8
          E9D9F7E6D0F6E5CAD5C5ACADA18C9F6466FF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFDA9D75FFFFFFFFFFFFFFFFFFFFFF
          FFFFFEFCFCF6EFFCF3E6EDD8C9A46A5FA46A5FA46A5FA36668FF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFDA9D75FFFFFF
          FFFFFFFFFFFFFFFFFFFFFFFFFFFEFBFFFEF7DAC1BAA56B5FE19E55E68F31B56D
          4DFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFE7AB79FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDCC7C5A56B5F
          F8B55CBF7A5CFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFE7AB79FBF4F0FBF4EFFAF3EFFAF3EFF8F2EFF7F2EFF7
          F2EFD8C2C0A56B5FC1836CFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFE7AB79D1926DD1926DD1926DD192
          6DD1926DD1926DD1926DD1926DA56B5FFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
        OnClick = BtReplicaClick
      end
      object BtLiberaReplicar: TSpeedButton
        Left = 6
        Top = 17
        Width = 32
        Height = 32
        Glyph.Data = {
          F6060000424DF606000000000000360000002800000018000000180000000100
          180000000000C0060000120B0000120B00000000000000000000FF00FFFF00FF
          FF00FFFF00FFFF00FF000368000368000368FF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FFFF00FF000368011ED8021DBB021BAF000368FF00FF
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0003683758FA011ED802
          1DBB021BAF000368FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0003
          683758FA3758FA011ED8021DBA021BAF000368FF00FFFF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FFFF00FFFF00FF0003683758FA3758FA011ED7021DBA021BAF000368FF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0003683758FA3758FA011ED7
          021DBA021BAF000368FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00
          03683758FA3758FA011ED5021DB8021BAF000368FF00FFFF00FFFF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FF0003683758FA3758FA011ED5021DB80216A9000368FF
          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FF0081BD0081BDFF00FFFF00FFFF00FFFF00FF0003683758FA3758FA011E
          D4021DB80216A9000368FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FF0081BD00A6E600A6E60081BDFF00FFFF00FFFF00FFFF00FF
          0003683758FA3758FA011ED4021DB80216A9000368FF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0081BD0081BDFF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FF0003683758FA3758FA011ED3021DB70216A9000368
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0003683758FA3758FA01
          1CCE0003680039A50041A5FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FFFF00FFFF00FF0081BDFF00FF0081BDFF00FFFF00FFFF00FFFF00FFFF00
          FF0003683758FA0003680097D500BAFB00ADEE0081BDFF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FFFF00FFFF00FF0081BD0081BD0081BDFF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FF0003680048AA00BDFF00A6E60090CE0097D50087
          C4FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0081BD00BAFB00BDFF00
          B1F20081BDFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006BBD00B6F70090CE
          00BDFF00BDFF0081BDFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0081BD0081
          BD0081BD00ADEE0087C40081BD0081BDFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FF0081BD00A6E600BDFF00BDFF0081BDFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FF0081BDFF00FFFF00FFFF00FF0081BD0081BDFF00
          FF0081BD0081BDFF00FFFF00FF0081BD0081BD00A3E2FF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
          0081BD00BDFF0081BD00BDFF0081BDFF00FFFF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FF0081BD00BDFF00BDFF00BDFF0081BDFF00FFFF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFFF00FF0081BD00B1F200BDFF00BDFF00BDFF00BAFB00
          81BDFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0081BD0081BD0081BD00A6E600BD
          FF00ADEE0081BD0081BD0081BDFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FF0081BD00B6F70081BDFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FFFF00FF0081BDFF00FFFF00FFFF00FFFF00FFFF00FF
          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
        OnClick = BtLiberaReplicarClick
      end
      object gCriados: TGauge
        Left = 44
        Top = 25
        Width = 184
        Height = 21
        ForeColor = clSkyBlue
        Progress = 0
        Visible = False
      end
      object trckbrqtdreplica: TTrackBar
        Left = 1
        Top = 55
        Width = 304
        Height = 33
        Enabled = False
        Max = 75
        TabOrder = 0
        OnChange = trckbrqtdreplicaChange
      end
    end
  end
  inherited qPadrao: TQuery
    AfterInsert = qPadraoAfterInsert
    AfterPost = qPadraoAfterPost
    AfterScroll = qPadraoAfterScroll
    SQL.Strings = (
      'SELECT * FROM EMPREENDIMENTOBLOCO'
      'WHERE 1 = -1')
    object qPadraoEMPBLODESCRICAO: TStringField
      FieldName = 'EMPBLODESCRICAO'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCO.EMPBLODESCRICAO'
      Size = 100
    end
    object qPadraoEMPREENDID: TIntegerField
      FieldName = 'EMPREENDID'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCO.EMPREENDID'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
    end
    object qPadraoEMPBLOID: TIntegerField
      FieldName = 'EMPBLOID'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCO.EMPBLOID'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
    end
    object qPadraoEMPBLOFLAGINFRA: TStringField
      FieldName = 'EMPBLOFLAGINFRA'
      Origin = '"BDSISTEMA.FDB".EMPREENDIMENTOBLOCO.EMPBLOFLAGINFRA'
      Size = 10
    end
  end
  object Qblocoetapa: TQuery
    DatabaseName = 'BDSistema.FDB'
    SQL.Strings = (
      'SELECT * FROM EMPREENDBLOCOETAPA WHERE 1=-1')
    Left = 424
    Top = 345
    object fltfldQEMPREENDIMENTOBLOCOMODELOEMPBLOETPVLMAODEOBRA: TFloatField
      FieldName = 'EMPBLOETPVLMAODEOBRA'
      Origin = '"BDSISTEMA.FDB".EMPREENDBLOCOETAPA.EMPBLOETPVLMAODEOBRA'
    end
    object dtmfldQEMPREENDIMENTOBLOCOMODELOEMPBLOETPDTPREVFIM: TDateTimeField
      FieldName = 'EMPBLOETPDTPREVFIM'
      Origin = '"BDSISTEMA.FDB".EMPREENDBLOCOETAPA.EMPBLOETPDTPREVFIM'
    end
    object dtmfldQEMPREENDIMENTOBLOCOMODELOEMPBLOETPDTPREVINICIO: TDateTimeField
      FieldName = 'EMPBLOETPDTPREVINICIO'
      Origin = '"BDSISTEMA.FDB".EMPREENDBLOCOETAPA.EMPBLOETPDTPREVINICIO'
    end
    object strngfldQEMPREENDIMENTOBLOCOMODELOEMPBLOETPDESCRICAO: TStringField
      FieldName = 'EMPBLOETPDESCRICAO'
      Origin = '"BDSISTEMA.FDB".EMPREENDBLOCOETAPA.EMPBLOETPDESCRICAO'
      Size = 100
    end
    object intgrfldQEMPREENDIMENTOBLOCOMODELOEMPBLOETPID: TIntegerField
      FieldName = 'EMPBLOETPID'
      Origin = '"BDSISTEMA.FDB".EMPREENDBLOCOETAPA.EMPBLOETPID'
    end
    object intgrfldQEMPREENDIMENTOBLOCOMODELOEMPBLOID: TIntegerField
      FieldName = 'EMPBLOID'
      Origin = '"BDSISTEMA.FDB".EMPREENDBLOCOETAPA.EMPBLOID'
    end
    object intgrfldQEMPREENDIMENTOBLOCOMODELOEMPREENDID: TIntegerField
      FieldName = 'EMPREENDID'
      Origin = '"BDSISTEMA.FDB".EMPREENDBLOCOETAPA.EMPREENDID'
    end
  end
  object dsblocoetapa: TDataSource
    DataSet = Qblocoetapa
    Left = 456
    Top = 345
  end
end
